home *** CD-ROM | disk | FTP | other *** search
/ Apple Reference & Present…ry 5: (Reseller Edition) / Apple Reference & Presentations Library 5.0 (Reseller Edition).iso / 3-Presentations / Apple Demos / Training / Macintosh SE⁄30 Training / Apple Macintosh SE⁄30 / Apple Macintosh SE_30 / background_44757.txt < prev    next >
Text File  |  1990-03-19  |  4KB  |  172 lines
  1. -- background: 44757 from stack: in
  2. -- bmap block id: 44830
  3. -- flags: 0000
  4. -- background id: 0
  5. -- name: technologyBack
  6. ----- HyperTalk script -----
  7. on closeBackground
  8.   global mapLoc
  9.   put 19 into mapLoc
  10. end closeBackground
  11. --—————————————————————————————————————————————————————————————————————
  12. on technoTwentyThree -- animation for architecture review
  13.   wait 30
  14.   visual dissolve
  15.   go card "technology23a"
  16.   runningPause
  17.   visual dissolve
  18.   go card "technology23b"
  19.   runningPause
  20.   visual dissolve slowly
  21.   go card "technology23c"
  22. end technoTwentyThree
  23. --—————————————————————————————————————————————————————————————————————
  24.  
  25.  
  26. -- part 1 (button)
  27. -- low flags: 00
  28. -- high flags: 2000
  29. -- rect: left=428 top=317 right=342 bottom=456
  30. -- title width / last selected line: 0
  31. -- icon id / first selected line: 18611 / 18611
  32. -- text alignment: 1
  33. -- font id: 0
  34. -- text size: 12
  35. -- style flags: 0
  36. -- line height: 16
  37. -- part name: prev
  38. ----- HyperTalk script -----
  39. on mouseUp
  40.   if "technology23" is in the name of this card then
  41.     visual scroll right
  42.     go card "technology22"
  43.     exit mouseUp
  44.   end if
  45.  
  46.   if "technology24" is in the name of this card then
  47.     visual scroll right
  48.     go card "technology23"
  49.     exit mouseUp
  50.   end if
  51.  
  52.   visual scroll right
  53.   go prev
  54. end mouseUp
  55.  
  56.  
  57.  
  58. -- part 2 (button)
  59. -- low flags: 00
  60. -- high flags: 2000
  61. -- rect: left=455 top=317 right=342 bottom=483
  62. -- title width / last selected line: 0
  63. -- icon id / first selected line: 18612 / 18612
  64. -- text alignment: 1
  65. -- font id: 0
  66. -- text size: 12
  67. -- style flags: 0
  68. -- line height: 16
  69. -- part name: next
  70. ----- HyperTalk script -----
  71. on mouseUp
  72.   if "technology23" is in the name of this card then
  73.     visual scroll left
  74.     go card "technology24"
  75.     exit mouseUp
  76.   end if
  77.  
  78.   visual scroll left
  79.   go next
  80. end mouseUp
  81.  
  82.  
  83.  
  84. -- part 3 (button)
  85. -- low flags: 00
  86. -- high flags: 2000
  87. -- rect: left=482 top=317 right=342 bottom=510
  88. -- title width / last selected line: 0
  89. -- icon id / first selected line: 18613 / 18613
  90. -- text alignment: 1
  91. -- font id: 0
  92. -- text size: 12
  93. -- style flags: 0
  94. -- line height: 16
  95. -- part name: return
  96. ----- HyperTalk script -----
  97. on mouseUp
  98.   pop card into lastPush
  99.   if the short name of this stack is not in lastPush then
  100.     visual dissolve
  101.     go card "Map"
  102.   else
  103.     visual dissolve
  104.     go lastPush
  105.   end if
  106. end mouseUp
  107.  
  108.  
  109.  
  110. -- part 4 (field)
  111. -- low flags: 01
  112. -- high flags: 0000
  113. -- rect: left=128 top=23 right=45 bottom=508
  114. -- title width / last selected line: 0
  115. -- icon id / first selected line: 0 / 0
  116. -- text alignment: 0
  117. -- font id: 21
  118. -- text size: 18
  119. -- style flags: 0
  120. -- line height: 20
  121. -- part name: cardTitle
  122.  
  123.  
  124. -- part 5 (field)
  125. -- low flags: 01
  126. -- high flags: 0000
  127. -- rect: left=128 top=70 right=315 bottom=509
  128. -- title width / last selected line: 0
  129. -- icon id / first selected line: 0 / 0
  130. -- text alignment: 0
  131. -- font id: 2
  132. -- text size: 12
  133. -- style flags: 0
  134. -- line height: 16
  135. -- part name: cardText
  136.  
  137.  
  138. -- part 9 (field)
  139. -- low flags: 01
  140. -- high flags: 0000
  141. -- rect: left=128 top=0 right=22 bottom=508
  142. -- title width / last selected line: 0
  143. -- icon id / first selected line: 0 / 0
  144. -- text alignment: 0
  145. -- font id: 21
  146. -- text size: 18
  147. -- style flags: 10240
  148. -- line height: 19
  149. -- part name: Title
  150.  
  151.  
  152. -- part 10 (button)
  153. -- low flags: 00
  154. -- high flags: A002
  155. -- rect: left=1 top=1 right=16 bottom=40
  156. -- title width / last selected line: 0
  157. -- icon id / first selected line: 0 / 0
  158. -- text alignment: 0
  159. -- font id: 3
  160. -- text size: 9
  161. -- style flags: 0
  162. -- line height: 12
  163. -- part name: Menu
  164. ----- HyperTalk script -----
  165. on mousedown
  166.   global checkedItem, clickTime
  167.   put 8 into checkedItem
  168.   mainMenu
  169.   put the ticks into clickTime
  170. end mousedown
  171.  
  172.